home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
MacWorld 1996 April
/
Macworld (1996-04).dmg
/
Educational Demos
/
Goldilocks Gamebook
/
Goldilocks.DIR
/
00535_Script_535
< prev
next >
Wrap
Text File
|
1995-11-20
|
638b
|
27 lines
-- Play Again
on mouseDown
global MC
puppetSound "Click.AIF"
put mouseCast() into MC
repeat while stillDown() = 1
if mouseCast() = MC then
set the castNum of sprite (the ClickOn) to MC +1
updateStage
next repeat
end if
if (mouseCast() <> MC + 1) then set the castNum of sprite (the ClickOn) to MC
updateStage
end repeat
end
on mouseUp
global MC
set the castNum of sprite (the clickOn) to MC
updateStage
if the mouseCast = MC or the mouseCast = MC + 1 then
put "no" into firstTime
go to "GameIntro"
end if
end